home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1998 September / Macworld (1998-09).dmg / Serious Demos / DesignWorks 4.0.1 Demo PPC / Design Kits / Generic Spice / Scripts / SPICE Netlist Script < prev   
Encoding:
Text File  |  1997-05-27  |  1.2 KB  |  58 lines  |  [TEXT/EDIT]
  1. $NOTES
  2. This format generates a "flattened" netlist file for Spice
  3. from a hierarchical or flat design.
  4.  
  5. Non-standard attribute fields required:
  6.  
  7. Field name    Where     Usage
  8.  
  9. SPICE         Devices   Contains SPICE parameters
  10.  
  11. $END
  12. $IF($NOT($REGEXP(.*SPICE (Flat|Pure), &DesignType)))
  13. $IF($NOT($ALERT2(This does not appear to be a SPICE Flat design.  Are you sure you want to proceed?)))
  14. $ABORT
  15. $END
  16. $END
  17. {
  18.   $PURE script mode lets us list each internal circuit once
  19. }
  20. $HIERARCHY $PURE
  21. $CREATEREPORT($DESIGNNAME.IN) $PROMPT $CREATOR(ttxt)
  22. {
  23.   Specify that the PinSequence attribute field can be used to specify pin order
  24. }
  25. $DEVPINSEQUENCE &PinSequence
  26. $COMBDEVSON
  27. {
  28.   Define the contents on an internal circuit
  29. }
  30. $DEFINECIRCUIT
  31. $SORT $DEVICES $DEVNAME
  32. $DEVICES$DEVNAME $PINS &Spice
  33. $END
  34. {
  35.   Start of main report
  36. }
  37. $DESIGNNAME   $DATE   $TIME
  38. &Spice
  39. {
  40.   Put out macros first
  41. }
  42. $FIND $DEVICES &Depth
  43. $SORT $DEVICES &Depth $TYPENAME
  44. $DEVPINFORMAT $CHILDSIGNAME
  45. $DEVICES.SUBCKT $TYPENAME $PINS$NEWLINE$INTERNAL.ENDS $TYPENAME
  46. {
  47.   Put out top circuit
  48. }
  49. $HIERARCHY $TOPCIRCUIT
  50. $DEVPINFORMAT $SIGNAME
  51. $FIND $DEVICES &Depth
  52. $SORT $DEVICES $DEVNAME
  53. $DEVICES$DEVNAME $PINS $TYPENAME &Spice
  54. $FIND $DEVICES $NOT &Depth
  55. $SORT $DEVICES $DEVNAME
  56. $DEVICES$DEVNAME $PINS &Spice
  57. .END
  58.